' T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%
 
 ' Q%      N a m e :   M e t i _ L i n e a r _ V 0 0 . t x t                       D a t e :   1 5   A u g   2 0 2 2   Q%
 
 ' Q%  A u t h o r :   L e o n a r d o                                                                                 Q%
 
 ' Q%    S c o p e :   T e s t   o v e r a l l   f u n c t i o n a l i t y                                             Q%
 
 ' `%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%c%
 
 ' Q%H a r d w a r e :   S T E P P E R   M O T O R   D R I V E N   i n   o p e n   l o o p                             Q%
 
 ' _% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %b%
 
 ' Q%  N o t e :   d r i v e r   T B 6 6 0 0                                                                           Q%
 
 ' Q%                                                                                                                  Q%
 
 ' Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%
 
 O p t i o n   S p e e d   9 
 
 ' B e e p   " 2 5 0 0   1 0 0 ,   1 5 0 0   1 0 0 " 
 
 
 
 ' V a r i a b l e   N u m e r i c   D e b u g   =   0   '   1   =   D E B U G       0   =   N O R M A L 
 
 
 
 R e s t o r e V a r s 
 
 
 
 L o a d   i m a g e s \ M e t i _ L i n e a r . j p g 
 
 ' B e e p   " 2 5 0 0   2 0 0 ,   1 5 0 0   2 0 0 ,   2 5 0 0   3 0 0 ,   0 5 0 0 ,   1 5 0 0   3 0 0 " 
 
 ' T T S   S e l e c t V o i c e   L a n g u a g e 
 
 ' T T S   S e t V o l u m e     1 0 0         ' 0   =   m u t e 
 
 ' W a i t   S e c o n d s   2 
 
 T T S   S e t S p e e d   - 1 
 
 
 
 ' W i n d o w   M i n S i z e 
 
 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %      %  %%%%  %%%%%
 
 '   Q%  V A R I A B L E   I N I T I A L I Z A T I O N S   &   A S S I G N E M E N T S     Q%  %      %  %%%%  %%%%%
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%    %%%    %    %  %    %%
 
 V a r i a b l e   N u m e r i c   S l o t _ M _ 1                 =     1 
 
 V a r i a b l e   N u m e r i c   S l o t _ E n M o t o r s       =   1 0 
 
 V a r i a b l e   N u m e r i c   S l o t _ H o m e S e n s o r   =     6 
 
 V a r i a b l e   N u m e r i c   S l o t _ L e d R               =     7 
 
 V a r i a b l e   N u m e r i c   S l o t _ L e d G               =     8 
 
 V a r i a b l e   N u m e r i c   S l o t _ L e d B               =     9 
 
 V a r i a b l e   N u m e r i c   S l o t _ S i g n S c o p e     =   1 3 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   S o f t w a r e   l i m i t s 
 
 V a r i a b l e   N u m e r i c   M 1 m a x   =     3 6 0 0 
 
 V a r i a b l e   N u m e r i c   M 1 m i n   =           0 
 
 
 
 K e y   1   B t n C o o r d _ M 1 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %%%%  %    %  %%%%%
 
 '   Q%  B U T T O N S                                                                     Q%  %%%%  %    %      %
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%  %%%%  %%%%      %
 
 B u t t o n   1   L a b e l   H o m e 
 
 B u t t o n   H o m e   C o l o r   A q u a m a r i n e 
 
 
 
 B u t t o n   2   L a b e l   " B t n C o o r d _ M 1 " 
 
 B u t t o n   B t n C o o r d _ M 1   T e x t   " M 1   =   ? " 
 
 B u t t o n   B t n C o o r d _ M 1   C o l o r   L i g h t B l u e 
 
 
 
 B u t t o n   3   L a b e l   P o s i t i o n 
 
 B u t t o n   P o s i t i o n   T e x t   " P o s i t i o n = ? " 
 
 B u t t o n   P o s i t i o n   C o l o r   L a v e n d e r 
 
 
 
 B u t t o n   4   L a b e l   P o s i t i o n _ 3 0 0 
 
 B u t t o n   P o s i t i o n _ 3 0 0   T e x t   " P o s i t i o n = 3 0 0 " 
 
 B u t t o n   P o s i t i o n _ 3 0 0   C o l o r   A q u a m a r i n e 
 
 
 
 B u t t o n   5   L a b e l   P o s i t i o n _ 2 5 0 
 
 B u t t o n   P o s i t i o n _ 2 5 0   T e x t   " P o s i t i o n = 2 5 0 " 
 
 B u t t o n   P o s i t i o n _ 2 5 0   C o l o r   A q u a m a r i n e 
 
 
 
 B u t t o n   6   L a b e l   P o s i t i o n _ 2 0 0 
 
 B u t t o n   P o s i t i o n _ 2 0 0   T e x t   " P o s i t i o n = 2 0 0 " 
 
 B u t t o n   P o s i t i o n _ 2 0 0   C o l o r   A q u a m a r i n e 
 
 
 
 B u t t o n   7   L a b e l   P o s i t i o n _ 1 5 0 
 
 B u t t o n   P o s i t i o n _ 1 5 0   T e x t   " P o s i t i o n = 1 5 0 " 
 
 B u t t o n   P o s i t i o n _ 1 5 0   C o l o r   A q u a m a r i n e 
 
 
 
 B u t t o n   8   L a b e l   P o s i t i o n _ 1 0 0 
 
 B u t t o n   P o s i t i o n _ 1 0 0   T e x t   " P o s i t i o n = 1 0 0 " 
 
 B u t t o n   P o s i t i o n _ 1 0 0   C o l o r   A q u a m a r i n e 
 
 
 
 B u t t o n   9   L a b e l   P o s i t i o n _ 5 0 
 
 B u t t o n   P o s i t i o n _ 5 0   T e x t   " P o s i t i o n = 5 0 " 
 
 B u t t o n   P o s i t i o n _ 5 0   C o l o r   A q u a m a r i n e 
 
 
 
 B u t t o n   1 0   L a b e l   P o s i t i o n _ 2 
 
 B u t t o n   P o s i t i o n _ 2   T e x t   " P o s i t i o n = 2 " 
 
 B u t t o n   P o s i t i o n _ 2   C o l o r   A q u a m a r i n e 
 
 
 
 B u t t o n   1 2   L a b e l   E n a b l e M o t o r s 
 
 B u t t o n   E n a b l e M o t o r s   T e x t   " E n a b l e   M o t o r s " 
 
 B u t t o n   E n a b l e M o t o r s   C o l o r   P a l e G r e e n 
 
 
 
 B u t t o n   1 3   L a b e l   D i s a b l e M o t o r s 
 
 B u t t o n   D i s a b l e M o t o r s   T e x t   " D i s a b l e   M o t o r s " 
 
 B u t t o n   D i s a b l e M o t o r s   C o l o r   P a l e G r e e n 
 
 
 
 B u t t o n   1 6   L a b e l   C l o s e A l l 
 
 B u t t o n   C l o s e A l l   T e x t   " C L O S E   A L L " 
 
 B u t t o n   C l o s e A l l   C o l o r   R e d 
 
 
 
 
 
 B u t t o n   2 0   L a b e l   M o t o r T e s t 
 
 B u t t o n   M o t o r T e s t   T e x t   " M o t o r T e s t " 
 
 B u t t o n   M o t o r T e s t   C o l o r   O r a n g e 
 
 
 
 B u t t o n   1 7   L a b e l   R e p T e s t 
 
 B u t t o n   R e p T e s t   T e x t   "   " R E P E T . T E S T " " 
 
 B u t t o n   R e p T e s t   C o l o r   K h a k i 
 
 
 
 ' B u t t o n   1 6   T e x t   E m e r g e n c y 
 
 ' B u t t o n   E m e r g e n c y   T e x t   " E M E R G E N C Y " 
 
 ' B u t t o n   E m e r g e n c y   C o l o r   R e d 
 
 ' B u t t o n   E m e r g e n c y   S l o t     S l o t _ E m e r g e n c y 
 
 
 
 B u t t o n   2 2   L a b e l   R e d O n 
 
 B u t t o n   R e d O n   C o l o r   R e d 
 
 B u t t o n   2 3   L a b e l   G r e e n O n 
 
 B u t t o n   G r e e n O n   C o l o r   G r e e n 
 
 B u t t o n   2 4   L a b e l   Y e l l o w O n 
 
 B u t t o n   Y e l l o w O n   C o l o r   Y e l l o w 
 
 B u t t o n   2 5   L a b e l   B l u e O n 
 
 B u t t o n   B l u e O n   C o l o r   M e d i u m B l u e 
 
 B u t t o n   2 6   L a b e l   W h i t e O n 
 
 B u t t o n   G r e e n O n   C o l o r   G r e e n 
 
 B u t t o n   2 7   L a b e l   R g b O f f 
 
 B u t t o n   R g b O f f   C o l o r   B l a c k 
 
 
 
 B u t t o n   2 8   L a b e l   E n a b l e V o i c e 
 
 B u t t o n   E n a b l e V o i c e   T e x t   " E n a b l e V o i c e " 
 
 B u t t o n   E n a b l e V o i c e   C o l o r   S k y B l u e 
 
 B u t t o n   2 9   L a b e l   D i s a b l e V o i c e 
 
 B u t t o n   D i s a b l e V o i c e   T e x t   " D i s a b l e   M o t o r s " 
 
 B u t t o n   D i s a b l e V o i c e   C o l o r   S k y B l u e 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   K E Y S 
 
 K e y   R i g h t 	 	   E x e c K e y s 
 
 K e y   L e f t   	 	   E x e c K e y s 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %      %%%%  %%%%  %%%%
 
 '   Q%  L O A D   A P P S                                                                 Q%  %      %    %  %%%%  %    %
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%  %%%  %%%%  %    %  %%%%
 
 
 
 L o a d   T h e r e m i n o _ H A L . e x e 
 
 L o a d   T h e r e m i n o _ S l o t V i e w e r . e x e 
 
 L o a d   T h e r e m i n o _ C o b o t . e x e 
 
 L o a d   T h e r e m i n o _ S i g n a l S c o p e . e x e 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%    %%%%  %%%%%  %%%%%  %%%%%  %%%%%
 
 '   Q%    S T A R T   F R O M   H E R E                                                   Q%    %%%%      %      %%%%%  %%%%%      %
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%    %%%%      %      %      %  %    %%      %
 
 E n a b l e M o t o r s 
 
 C o n t r o l s   O p e n T e x t B o x 
 
 D i s a b l e A l l B u t t o n s 
 
 C o n t r o l s   C l e a r T e x t B o x 
 
 G r e e n O n 
 
 P r i n t   T T S v o i c e s 
 
 E n a b l e A l l B u t t o n s 
 
 U p d a t e B u t t o n s 
 
 L o a d   H i d e 
 
 ' E n a b l e V o i c e 
 
 D i s a b l e V o i c e 
 
 L o o p 
 
 S t o p 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %%%  %      %%%%  %%%%  %%%%
 
 '   Q%  C L O S E   A L L                                                                 Q%  %      %      %    %  %%%%  %%%
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%  %%%  %%%  %%%%  %%%%  %%%%
 
 L a b e l   C l o s e A l l 
 
 	 R e d O n 
 
 	 S a v e V a r s 
 
 	 D i s a b l e M o t o r s 
 
 	 W i n d o w   S i z a b l e 
 
 	 S l o t ( S l o t _ S i g n S c o p e )   =   0 
 
 	 T T S   S p e a k   " E n d   O f   P r o g r a m . " 
 
 	 L o a d   C l o s e A p p s 
 
 R e t u r n 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %%%%  %%%%%  %%%%  %%%%
 
 '   Q%  S T O P   E V E N T   ( w h e n   p r e s s i n g   s t o p   b u t t o n )           Q%  %%%%      %      %    %  %%%%
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%  %%%%      %      %%%%  %
 
 L a b e l   E v e n t S t o p 
 
 	 S a v e V a r s 
 
 	 D i s a b l e M o t o r s 
 
 	 R e d O n 
 
 	 E n a b l e A l l B u t t o n s 
 
 	 W i n d o w   S i z a b l e 
 
 	 S l o t ( S l o t _ S i g n S c o p e )   =   0 
 
 	 T T S   S p e a k   " E n d   O f   P r o g r a m . " 
 
 E n d 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %      %%%%  %%%%  %%%%
 
 '   Q%  L O O P                                                                           Q%  %      %    %  %    %  %%%%
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%  %%%  %%%%  %%%%  %
 
 L a b e l   L o o p 
 
 	 U p d a t e B u t t o n s 
 
 	 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 '   0 . 0 2   s e c .   o r   m o r e   t o   a l l o w   t i m e   f o r   k e y s   a n d   o t h e r   t a s k s 
 
 	 W a i t   S e c o n d s   0 . 0 2 
 
 	 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 G o t o   L o o p 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%
 
 '   Q%  E N A B L E / D I S A B L E   B U T T O N S                                       Q%
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%
 
 L a b e l   E n a b l e A l l B u t t o n s 
 
 	 F o r   v 1   =   1   T o   1 6 
 
 	 	 B u t t o n   v 1   E n a b l e d 
 
 	 N e x t 
 
 R e t u r n 
 
 
 
 L a b e l   D i s a b l e A l l B u t t o n s 
 
 	 F o r   v 1   =   1   T o   1 6 
 
 	 	 B u t t o n   v 1   D i s a b l e d 
 
 	 N e x t 
 
 R e t u r n 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%
 
 '   Q%  S A V E   L O A D   V A R S                                                       Q%
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%
 
 L a b e l   S a v e V a r s 
 
 	 S a v e   V a r s 
 
 R e t u r n 
 
 
 
 L a b e l   R e s t o r e V a r s 
 
 	 L o a d   V a r s 
 
 R e t u r n 
 
 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %    %  %%%%  %%%%%  %%%%
 
 '   Q%  H O M I N G   S T E P P E R S                                                         Q%  %%%%  %    %  %      %  %%%
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%  %    %  %%%%  %      %  %%%%
 
 L a b e l   H o m e 
 
 	 E n a b l e M o t o r s 
 
 	 S l o t ( S l o t _ M _ 1 )   =   S l o t ( S l o t _ M _ 1 )   - 1 0 
 
 G o t o   H o m i n g _ M 1 
 
 
 
 L a b e l   H o m i n g _ M 1 
 
 	 S l o t ( S l o t _ M _ 1 )   =   S l o t ( S l o t _ M _ 1 )   +   0 . 5 	 	 '   d i r e c t i o n   a n d   s p e e d   g o t o   s w i t c h 
 
 	 W a i t   S e c o n d s   0 . 0 2 	 	                             	 '   d o   n o t   a l t e r ,   l o o p   t i m e   0 . 0 2   S e c 
 
 	 I f   S l o t ( S l o t _ H o m e S e n s o r )   >   5 0 0 
 
 	 	 G o t o   H o m i n g _ M o t _ 2 
 
 	 E n d I f 
 
 G o t o   H o m i n g _ M 1 
 
 
 
 L a b e l   H o m i n g _ M o t _ 2 
 
 	 S l o t ( S l o t _ M _ 1 )   =   S l o t ( S l o t _ M _ 1 )   -   0 . 2 	 '   0 . 0 5   d i r e c t i o n   a n d   s p e e d   r e t u r n   f r o m   s w i t c h 
 
 	 W a i t   S e c o n d s   0 . 0 2 	 	                           	 '   d o   n o t   a l t e r ,   l o o p   t i m e   0 . 0 2   S e c 
 
 	 I f   S l o t ( S l o t _ H o m e S e n s o r )   <   5 0 0 
 
 	 	 G o t o   H o m i n g _ M o t _ 3 
 
 	 E n d I f 
 
 G o t o   H o m i n g _ M o t _ 2 
 
 
 
 L a b e l   H o m i n g _ M o t _ 3 
 
 	 W a i t   S e c o n d s   0 . 1 
 
 	 S l o t   S l o t _ M _ 1   =   R e s e t 	 	 	 	 '   R e s e t   t h e   s l o t   v a l u e 
 
 	 W a i t   S e c o n d s   0 . 2 
 
 	 S l o t   S l o t _ M _ 1   =   3 0 1                                     '   D e c l a r e d   p o s i t i o n   i n   m m 
 
 	 W a i t   S e c o n d s   0 . 2 
 
 	 S l o t   S l o t _ M _ 1   =   3 0 0 	 	 	 	 	 '   m o v e   t o   t h i s   p o s i t i o n 
 
 	 W a i t A l l M o t o r s 
 
 R e t u r n 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %%%%%  %%%%  %      %  %%%%
 
 '   Q%  M O V E   S T E P P E R S                                                             Q%  %      %  %    %  %      %  %%%
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%  %      %  %%%%    %%%    %%%%
 
 L a b e l   P o s i t i o n _ 3 0 0 
 
 	 T T S   S p e a k   " M o t o r   g o   a t   3 0 0   P o s i t i o n . " 
 
 	 S l o t ( S l o t _ M _ 1 )   =   3 0 0 
 
 	 U p d a t e B u t t o n s 
 
 	 W a i t   T T S r e a d y 
 
 	 R e d O n 
 
 	 W a i t A l l M o t o r s 
 
 R e t u r n 
 
 
 
 L a b e l   P o s i t i o n _ 2 5 0 
 
 	 T T S   S p e a k   " M o t o r   g o   a t   2 5 0   P o s i t i o n . " 
 
 	 S l o t ( S l o t _ M _ 1 )   =   2 5 0 
 
 	 U p d a t e B u t t o n s 
 
 	 W a i t   T T S r e a d y 
 
 	 R e d O n 
 
 	 W a i t A l l M o t o r s 
 
 R e t u r n 
 
 
 
 L a b e l   P o s i t i o n _ 2 0 0 
 
 	 T T S   S p e a k   " M o t o r   g o   a t   2 0 0   P o s i t i o n . " 
 
 	 S l o t ( S l o t _ M _ 1 )   =   2 0 0 
 
 	 U p d a t e B u t t o n s 
 
 	 W a i t   T T S r e a d y 
 
 	 G r e e n O n 
 
 	 W a i t A l l M o t o r s 
 
 R e t u r n 
 
 
 
 L a b e l   P o s i t i o n _ 1 5 0 
 
 	 T T S   S p e a k   " M o t o r   g o   a t   1 5 0   P o s i t i o n . " 
 
 	 S l o t ( S l o t _ M _ 1 )   =   1 5 0 
 
 	 U p d a t e B u t t o n s 
 
 	 W a i t   T T S r e a d y 
 
 	 Y e l l o w O n 
 
 	 W a i t A l l M o t o r s 
 
 R e t u r n 
 
 
 
 L a b e l   P o s i t i o n _ 1 0 0 
 
 	 T T S   S p e a k   " M o t o r   g o   a t   1 0 0   P o s i t i o n . " 
 
 	 S l o t ( S l o t _ M _ 1 )   =   1 0 0 
 
 	 U p d a t e B u t t o n s 
 
 	 W a i t   T T S r e a d y 
 
 	 B l u e O n 
 
 	 W a i t A l l M o t o r s 
 
 R e t u r n 
 
 
 
 L a b e l   P o s i t i o n _ 5 0 
 
 	 T T S   S p e a k   " M o t o r   g o   a t   5 0   P o s i t i o n . " 
 
 	 S l o t ( S l o t _ M _ 1 )   =   5 0 
 
 	 U p d a t e B u t t o n s 
 
 	 W a i t   T T S r e a d y 
 
 	 W h i t e O n 
 
 	 W a i t A l l M o t o r s 
 
 R e t u r n 
 
 
 
 L a b e l   P o s i t i o n _ 2 
 
 	 T T S   S p e a k   " M o t o r   g o   a t   2   P o s i t i o n . " 
 
 	 S l o t ( S l o t _ M _ 1 )   =   2 
 
 	 U p d a t e B u t t o n s 
 
 	 W a i t   T T S r e a d y 
 
 	 R e d O n 
 
 	 W a i t A l l M o t o r s 
 
 R e t u r n 
 
 
 
 L a b e l   P o s i t i o n 
 
 	 V 1   =   I n p u t   " W r i t e   t h e   d e s t i n a t i o n . " 
 
 	 ' T T S   S p e a k   " M o t o r   g o   a t   5 0   P o s i t i o n . " 
 
 	 S l o t ( S l o t _ M _ 1 )   =   v 1 
 
 	 U p d a t e B u t t o n s 
 
 	 W a i t   T T S r e a d y 
 
 	 W h i t e O n 
 
 	 W a i t A l l M o t o r s 
 
 R e t u r n 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %      %  %%%%  %  %%%%%
 
 '   Q%  W A I T   A L L   M O T O R   u n t i l   s t o p p e d                           Q%  %      %  %%%%  %      %
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%  %%%%%  %    %  %      %
 
 L a b e l   W a i t A l l M o t o r s 
 
 	 
 
 	 V a r i a b l e   N u m e r i c   W A M 1 
 
 	 W a i t   S e c o n d s   0 . 1 
 
 	 F o r   W A M 1   =   1   T o   I n f i n i t y 
 
 	 	 I f   A b s ( S l o t ( S l o t _ M _ 1   +   1 ) )   <   0 . 0 1 
 
 	 	 	 E x i t 
 
 	 	 E n d I f 
 
 	 	 W a i t   S e c o n d s   0 . 0 5 
 
 	 	 U p d a t e B u t t o n s 
 
 	 N e x t 
 
 R e t u r n 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%
 
 '   Q%  E M E R G E N C Y                                                                 Q%
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%
 
 L a b e l   E m e r g e n c y 
 
 ' 	 D i s a b l e A l l B u t t o n s 
 
 ' 	 B u t t o n   1 5   E n a b l e d 
 
 ' 	 B u t t o n   1 5   C o l o r   F l a s h i n g 7   Y e l l o w   R e d 
 
 ' 	 F o r   v 1   =   1   T o   I n f i n i t y 
 
 ' 	 	 R e d O n 
 
 ' 	 	 W a i t   S e c o n d s   0 . 4 
 
 ' 	 	 R g b O f f 
 
 ' 	 	 W a i t   S e c o n d s   0 . 4 
 
 ' 	 	 L o a d   s o u n d \ A l a r m 1 0 b . w a v 
 
 ' 	 N e x t 
 
 S t o p 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %%%%  %    %  %%%
 
 '   Q%    S   U   B   R   O   U   T   I   N   E       A   R   E   A                           Q%  %%%%  %    %  %%%%
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%  %%%%  %%%%  %%%%
 
 L a b e l   E n a b l e V o i c e 
 
 	 T T S   S e t V o l u m e   1 0 0 
 
 	 B u t t o n   E n a b l e V o i c e   D i s a b l e d 
 
 	 B u t t o n   D i s a b l e V o i c e   E n a b l e d 
 
 	 
 
 R e t u r n 
 
 
 
 L a b e l   D i s a b l e V o i c e 
 
 	 T T S   S e t V o l u m e   0 
 
 	 B u t t o n   E n a b l e V o i c e   E n a b l e d 
 
 	 B u t t o n   D i s a b l e V o i c e   D i s a b l e d 
 
 R e t u r n 
 
 
 
 
 
 
 
 L a b e l   E n a b l e M o t o r s 
 
 	 S l o t ( S l o t _ E n M o t o r s )   =   1 0 0 0 
 
 	 B u t t o n   E n a b l e M o t o r s   D i s a b l e d 
 
 	 B u t t o n   D i s a b l e M o t o r s   E n a b l e d 
 
 	 W a i t   S e c o n d s   0 . 0 1 
 
 R e t u r n 
 
 
 
 L a b e l   D i s a b l e M o t o r s 
 
 	 S l o t ( S l o t _ E n M o t o r s )   =   0 
 
 	 B u t t o n   D i s a b l e M o t o r s   D i s a b l e d 
 
 	 B u t t o n   E n a b l e M o t o r s   E n a b l e d 
 
 	 W a i t   S e c o n d s   0 . 0 1 
 
 R e t u r n 
 
 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %      %%%  %%%%
 
 '   Q%  L E D   C O L O R S                                                               Q%  %      %%    %    %
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%  %%%  %%%  %%%%
 
 L a b e l   R e d O n 
 
 	 T T S   S p e a k   " S t a t u s   r e d . " 
 
 	 S l o t   S l o t _ L e d R   =   1 0 0 0 
 
 	 S l o t   S l o t _ L e d G   =   0 
 
 	 S l o t   S l o t _ L e d B   =   0 
 
 	 W a i t   T T S r e a d y 
 
 R e t u r n 
 
 
 
 L a b e l   M a g e n t a O n 
 
 	 T T S   S p e a k   " S t a t u s   m a g e n t a . " 
 
 	 S l o t   S l o t _ L e d R   =   1 0 0 0 
 
 	 S l o t   S l o t _ L e d G   =   0 
 
 	 S l o t   S l o t _ L e d B   =   1 0 0 0 
 
 R e t u r n 
 
 
 
 L a b e l   Y e l l o w O n 
 
 	 T T S   S p e a k   " S t a t u s   y e l l o w . " 
 
 	 S l o t   S l o t _ L e d R   =   9 0 0 
 
 	 S l o t   S l o t _ L e d G   =   4 0 0 
 
 	 S l o t   S l o t _ L e d B   =   0 
 
 	 W a i t   T T S r e a d y 
 
 R e t u r n 
 
 
 
 L a b e l   G r e e n O n 
 
 	 T T S   S p e a k   " S t a t u s   g r e e n . " 
 
 	 S l o t   S l o t _ L e d R   =   0 
 
 	 S l o t   S l o t _ L e d G   =   1 0 0 0 
 
 	 S l o t   S l o t _ L e d B   =   0 
 
 	 W a i t   T T S r e a d y 
 
 R e t u r n 
 
 
 
 L a b e l   B l u e O n 
 
 	 T T S   S p e a k   " S t a t u s   b l u e . " 
 
 	 S l o t   S l o t _ L e d R   =   0 
 
 	 S l o t   S l o t _ L e d G   =   0 
 
 	 S l o t   S l o t _ L e d B   =   1 0 0 0 
 
 	 W a i t   T T S r e a d y 
 
 R e t u r n 
 
 
 
 L a b e l   W h i t e O n 
 
 	 T T S   S p e a k   " S t a t u s   w h i t e . " 
 
 	 S l o t   S l o t _ L e d R   =   1 0 0 0 
 
 	 S l o t   S l o t _ L e d G   =   1 0 0 0 
 
 	 S l o t   S l o t _ L e d B   =   1 0 0 0 
 
 	 W a i t   T T S r e a d y 
 
 R e t u r n 
 
 
 
 L a b e l   R g b O f f 
 
 	 T T S   S p e a k   " S t a t u s   b l a c k . " 
 
 	 S l o t   S l o t _ L e d R   =   0 
 
 	 S l o t   S l o t _ L e d G   =   0 
 
 	 S l o t   S l o t _ L e d B   =   0 
 
 	 W a i t   T T S r e a d y 
 
 R e t u r n 
 
 
 
 L a b e l   R e d B l i n k 
 
 	 R e d O n 
 
 	 W h i t e O n 
 
 R e t u r n 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %%%%  %%%%  %%%%    %    %  %%%%  %      %
 
 '   Q%  J O G   W I T H   K E Y B O A R D                                                 Q%      %    %    %  %  %%    %%%    %%%      %%%
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%  %%%    %%%%  %%%%    %  %%  %%%%      %
 
 L a b e l   E x e c K e y s 
 
 	 V a r i a b l e   N u m e r i c   J o g S p e e d   =   0 . 1 
 
 	 S e l e c t   T r u e 
 
 	 	 C a s e   K e y ( " S H I F T " ) 
 
 	 	 	 J o g S p e e d   =   J o g S p e e d   *   0 . 0 1 
 
 	 	 C a s e   K e y ( " C T R L " ) 
 
 	 	 	 J o g S p e e d   =   J o g S p e e d   *   0 . 0 0 1 
 
 	 E n d S e l e c t 
 
 	 ' 
 
 	 S e l e c t   M o t o r T o E d i t 
 
 	 	 C a s e   1 
 
 	 	 	 I f   K e y ( " U p " ) 
 
 	 	 	 	 S l o t ( S l o t _ M _ 1 )   =   L i m i t ( S l o t ( S l o t _ M _ 1 )   -   J o g S p e e d ,   M 1 m i n ,   M 1 m a x ) 
 
 	 	 	 E n d I f 
 
 	 	 	 I f   K e y ( " D o w n " ) 
 
 	 	 	 	 S l o t ( S l o t _ M _ 1 )   =   L i m i t ( S l o t ( S l o t _ M _ 1 )   +   J o g S p e e d ,   M 1 m i n ,   M 1 m a x ) 
 
 	 	 	 E n d I f 
 
 	 E n d S e l e c t 
 
 	 ' 
 
 	 P r i n t V a l u e s 
 
 	 ' E n a b l e M o t o r s 
 
 	 ' Y e l l o w O n 
 
 	 U p d a t e B u t t o n s 
 
 R e t u r n 
 
 
 
 '   T%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%W%  %%%%  %%%%  %%%%      %%  %%  %%%%  %%%%%
 
 '   Q%    M O T O R   S E L E C T I O N   F O R   J O G                                   Q%      %    %    %  %  %%      %  %  %  %    %      %
 
 '   Z%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%P%]%  %%%    %%%%  %%%%      %      %  %%%%      %
 
 V a r i a b l e   N u m e r i c   M o t o r T o E d i t 
 
 L a b e l   d e f a u l t c o l o r s 
 
 	 B u t t o n   B t n C o o r d _ M 1   C o l o r   L i g h t B l u e 
 
 R e t u r n 
 
 
 
 L a b e l   B t n C o o r d _ M 1 
 
 	 M o t o r T o E d i t   =   1 
 
 	 d e f a u l t c o l o r s 
 
 	 B u t t o n   B t n C o o r d _ M 1   C o l o r   B l u e 
 
 R e t u r n 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '     P R I N T   C O O R D I N A T E S   A N D   U P D A T E   C O O R D I N A T E   B U T T O N S 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 L a b e l   P r i n t V a l u e s 
 
 	 s 1   =   " M o v e T o   "   +   F o r m a t ( S l o t ( S l o t _ M _ 1 ) ,   " 0 . 0 0 " ) 
 
 	 P r i n t   C R L F   +   s 1 
 
 R e t u r n 
 
 
 
 L a b e l   U p d a t e B u t t o n s 
 
 	 B u t t o n   B t n C o o r d _ M 1   T e x t   " M 1 = "   +   F o r m a t ( S l o t ( S l o t _ M _ 1 )   -   S l o t ( S l o t _ M _ 1   +   1 ) ,   " 0 . 0 0 " )   +   " m m " 
 
 R e t u r n 
 
 
 
 
 
 ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 ' I n d e x     N a m e                                                     C u l t u r e     G e n d e r       A g e 
 
 ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 ' 1             M i c r o s o f t   D a v i d   D e s k t o p               e n - U S         M a l e           A d u l t 
 
 ' 2             M i c r o s o f t   Z i r a   D e s k t o p                 e n - U S         F e m a l e       A d u l t 
 
 ' 3             M i c r o s o f t   E l s a   D e s k t o p                 i t - I T         F e m a l e       A d u l t 
 
 ' 4             M i c r o s o f t   H u i h u i   D e s k t o p             z h - C N         F e m a l e       A d u l t 
 
 ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 
 
 
 
 ' W A T C H   S l o t ( S l o t _ H o m e S e n s o r ) 
 
 